home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / scope / 001-025 / scopedisk6 / 6809xasm / tst03.a < prev    next >
Text File  |  1995-03-18  |  13KB  |  264 lines
  1.         TTL   Test of the 6809 assembler - #3
  2. DLabel  equ   $10
  3. Label1  EQU   $1234
  4. Label2  equ   $1005
  5.         setdp $1000          set direct page in the assembler
  6.         ORG   $B000
  7.  
  8.         daa                  inherent
  9.         deca                 inherent
  10.         decb                 inherent
  11.  
  12. dec1    dec   DLabel         extended
  13.         dec   Label1         extended
  14.         dec   <Label2        forced direct
  15.         dec   >Label1        forced extended
  16.         dec   Label1         extended
  17.         dec   Label2         direct
  18.         dec   ,x             0 bit offset index
  19.         dec   1,x            5 bit offset index
  20.         dec   64,x           8 bit offset index
  21.         dec   4096,x         16 bit offset index
  22.         dec   [,x]           0 bit offset indirect index
  23.         dec   [1,x]          5 bit offset indirect index
  24.         dec   [64,x]         8 bit offset indirect index
  25.         dec   [4096,x]       16 bit offset indirect index
  26.         dec   a,x            'A' register index
  27.         dec   b,x            'B' register index
  28.         dec   d,x            'D' ('A' & 'B') register index
  29.         dec   [a,x]          'A' register indirect index
  30.         dec   [b,x]          'B' register indirect index
  31.         dec   [d,x]          'D' ('A' & 'B') register indirect index
  32.         dec   ,x+            index with 1 post-increment
  33.         dec   ,x++           index with 2 post-increment
  34.         dec   ,-x            index with 1 pre-decrement
  35.         dec   ,--x           index with 2 pre-decrement
  36.         dec   [,x++]         indirect index with post-increment
  37.         dec   [,--x]         indirect index with pre-drecement
  38.         dec   1,pcr          8 bit index from 'PC'
  39.         dec   64,pcr         8 bit index from 'PC'
  40.         dec   <DLabel,pcr    forced 8 bit index from 'PC'
  41.         dec   4096,pcr       16 bit index from 'PC'
  42.         dec   >DLabel,pcr    forced 16 bit index from 'PC'
  43.         dec   [1,pcr]        8 bit indirect index from 'PC'
  44.         dec   [64,pcr]       8 bit indirect index from 'PC'
  45.         dec   [4096,pcr]     16 bit indirect index from 'PC'
  46.         dec   [Label1]       memory indirect
  47.         page
  48. eora1   eora  #12            immediate
  49.         eora  DLabel         extended
  50.         eora  Label1         extended
  51.         eora  <Label2        forced direct
  52.         eora  >Label1        forced extended
  53.         eora  Label1         extended
  54.         eora  Label2         direct
  55.         eora  ,x             0 bit offset index
  56.         eora  1,x            5 bit offset index
  57.         eora  64,x           8 bit offset index
  58.         eora  4096,x         16 bit offset index
  59.         eora  [,x]           0 bit offset indirect index
  60.         eora  [1,x]          5 bit offset indirect index
  61.         eora  [64,x]         8 bit offset indirect index
  62.         eora  [4096,x]       16 bit offset indirect index
  63.         eora  a,x            'A' register index
  64.         eora  b,x            'B' register index
  65.         eora  d,x            'D' ('A' & 'B') register index
  66.         eora  [a,x]          'A' register indirect index
  67.         eora  [b,x]          'B' register indirect index
  68.         eora  [d,x]          'D' ('A' & 'B') register indirect index
  69.         eora  ,x+            index with 1 post-increment
  70.         eora  ,x++           index with 2 post-increment
  71.         eora  ,-x            index with 1 pre-decrement
  72.         eora  ,--x           index with 2 pre-decrement
  73.         eora  [,x++]         indirect index with post-increment
  74.         eora  [,--x]         indirect index with pre-drecement
  75.         eora  1,pcr          8 bit index from 'PC'
  76.         eora  64,pcr         8 bit index from 'PC'
  77.         eora  <DLabel,pcr    forced 8 bit index from 'PC'
  78.         eora  4096,pcr       16 bit index from 'PC'
  79.         eora  >DLabel,pcr    forced 16 bit index from 'PC'
  80.         eora  [1,pcr]        8 bit indirect index from 'PC'
  81.         eora  [64,pcr]       8 bit indirect index from 'PC'
  82.         eora  [4096,pcr]     16 bit indirect index from 'PC'
  83.         eora  [Label1]       memory indirect
  84.         page
  85. eorb1   eorb  #12            immediate
  86.         eorb  DLabel         extended
  87.         eorb  Label1         extended
  88.         eorb  <Label2        forced direct
  89.         eorb  >Label1        forced extended
  90.         eorb  Label1         extended
  91.         eorb  Label2         direct
  92.         eorb  ,x             0 bit offset index
  93.         eorb  1,x            5 bit offset index
  94.         eorb  64,x           8 bit offset index
  95.         eorb  4096,x         16 bit offset index
  96.         eorb  [,x]           0 bit offset indirect index
  97.         eorb  [1,x]          5 bit offset indirect index
  98.         eorb  [64,x]         8 bit offset indirect index
  99.         eorb  [4096,x]       16 bit offset indirect index
  100.         eorb  a,x            'A' register index
  101.         eorb  b,x            'B' register index
  102.         eorb  d,x            'D' ('A' & 'B') register index
  103.         eorb  [a,x]          'A' register indirect index
  104.         eorb  [b,x]          'B' register indirect index
  105.         eorb  [d,x]          'D' ('A' & 'B') register indirect index
  106.         eorb  ,x+            index with 1 post-increment
  107.         eorb  ,x++           index with 2 post-increment
  108.         eorb  ,-x            index with 1 pre-decrement
  109.         eorb  ,--x           index with 2 pre-decrement
  110.         eorb  [,x++]         indirect index with post-increment
  111.         eorb  [,--x]         indirect index with pre-drecement
  112.         eorb  1,pcr          8 bit index from 'PC'
  113.         eorb  64,pcr         8 bit index from 'PC'
  114.         eorb  <DLabel,pcr    forced 8 bit index from 'PC'
  115.         eorb  4096,pcr       16 bit index from 'PC'
  116.         eorb  >DLabel,pcr    forced 16 bit index from 'PC'
  117.         eorb  [1,pcr]        8 bit indirect index from 'PC'
  118.         eorb  [64,pcr]       8 bit indirect index from 'PC'
  119.         eorb  [4096,pcr]     16 bit indirect index from 'PC'
  120.         eorb  [Label1]       memory indirect
  121.         page
  122.         exg   a,b            immediate
  123.         exg   b,a            immediate
  124.         exg   a,cc           immediate
  125.         exg   cc,a           immediate
  126.         exg   b,cc           immediate
  127.         exg   cc,b           immediate
  128.         exg   a,ddr          immediate
  129.         exg   ddr,a          immediate
  130.         exg   d,x            immediate
  131.         exg   x,d            immediate
  132.         exg   d,y            immediate
  133.         exg   y,d            immediate
  134.         exg   d,s            immediate
  135.         exg   s,d            immediate
  136.         exg   d,u            immediate
  137.         exg   u,d            immediate
  138.         exg   u,s            immediate
  139.         exg   s,u            immediate
  140.         exg   u,y            immediate
  141.         exg   y,u            immediate
  142.         exg   u,x            immediate
  143.         exg   x,u            immediate
  144.         exg   s,x            immediate
  145.         exg   x,s            immediate
  146.         exg   s,y            immediate
  147.         exg   y,s            immediate
  148.         exg   x,y            immediate
  149.         exg   y,x            immediate
  150.         exg   x,pc           immediate
  151.         exg   pc,x           immediate
  152.         page
  153.         inca                 inherent
  154.         incb                 inherent
  155.  
  156. inc1    inc   DLabel         extended
  157.         inc   Label1         extended
  158.         inc   <Label2        forced direct
  159.         inc   >Label1        forced extended
  160.         inc   Label1         extended
  161.         inc   Label2         direct
  162.         inc   ,x             0 bit offset index
  163.         inc   1,x            5 bit offset index
  164.         inc   64,x           8 bit offset index
  165.         inc   4096,x         16 bit offset index
  166.         inc   [,x]           0 bit offset indirect index
  167.         inc   [1,x]          5 bit offset indirect index
  168.         inc   [64,x]         8 bit offset indirect index
  169.         inc   [4096,x]       16 bit offset indirect index
  170.         inc   a,x            'A' register index
  171.         inc   b,x            'B' register index
  172.         inc   d,x            'D' ('A' & 'B') register index
  173.         inc   [a,x]          'A' register indirect index
  174.         inc   [b,x]          'B' register indirect index
  175.         inc   [d,x]          'D' ('A' & 'B') register indirect index
  176.         inc   ,x+            index with 1 post-increment
  177.         inc   ,x++           index with 2 post-increment
  178.         inc   ,-x            index with 1 pre-decrement
  179.         inc   ,--x           index with 2 pre-decrement
  180.         inc   [,x++]         indirect index with post-increment
  181.         inc   [,--x]         indirect index with pre-drecement
  182.         inc   1,pcr          8 bit index from 'PC'
  183.         inc   64,pcr         8 bit index from 'PC'
  184.         inc   <DLabel,pcr    forced 8 bit index from 'PC'
  185.         inc   4096,pcr       16 bit index from 'PC'
  186.         inc   >DLabel,pcr    forced 16 bit index from 'PC'
  187.         inc   [1,pcr]        8 bit indirect index from 'PC'
  188.         inc   [64,pcr]       8 bit indirect index from 'PC'
  189.         inc   [4096,pcr]     16 bit indirect index from 'PC'
  190.         inc   [Label1]       memory indirect
  191.         page
  192. jmp1    jmp   DLabel         extended
  193.         jmp   Label1         extended
  194.         jmp   <Label2        forced direct
  195.         jmp   >Label1        forced extended
  196.         jmp   Label1         extended
  197.         jmp   Label2         direct
  198.         jmp   ,x             0 bit offset index
  199.         jmp   1,x            5 bit offset index
  200.         jmp   64,x           8 bit offset index
  201.         jmp   4096,x         16 bit offset index
  202.         jmp   [,x]           0 bit offset indirect index
  203.         jmp   [1,x]          5 bit offset indirect index
  204.         jmp   [64,x]         8 bit offset indirect index
  205.         jmp   [4096,x]       16 bit offset indirect index
  206.         jmp   a,x            'A' register index
  207.         jmp   b,x            'B' register index
  208.         jmp   d,x            'D' ('A' & 'B') register index
  209.         jmp   [a,x]          'A' register indirect index
  210.         jmp   [b,x]          'B' register indirect index
  211.         jmp   [d,x]          'D' ('A' & 'B') register indirect index
  212.         jmp   ,x+            index with 1 post-increment
  213.         jmp   ,x++           index with 2 post-increment
  214.         jmp   ,-x            index with 1 pre-decrement
  215.         jmp   ,--x           index with 2 pre-decrement
  216.         jmp   [,x++]         indirect index with post-increment
  217.         jmp   [,--x]         indirect index with pre-drecement
  218.         jmp   1,pcr          8 bit index from 'PC'
  219.         jmp   64,pcr         8 bit index from 'PC'
  220.         jmp   <DLabel,pcr    forced 8 bit index from 'PC'
  221.         jmp   4096,pcr       16 bit index from 'PC'
  222.         jmp   >DLabel,pcr    forced 16 bit index from 'PC'
  223.         jmp   [1,pcr]        8 bit indirect index from 'PC'
  224.         jmp   [64,pcr]       8 bit indirect index from 'PC'
  225.         jmp   [4096,pcr]     16 bit indirect index from 'PC'
  226.         jmp   [Label1]       memory indirect
  227.         page
  228. jsr1    jsr   DLabel         extended
  229.         jsr   Label1         extended
  230.         jsr   <Label2        forced direct
  231.         jsr   >Label1        forced extended
  232.         jsr   Label1         extended
  233.         jsr   Label2         direct
  234.         jsr   ,x             0 bit offset index
  235.         jsr   1,x            5 bit offset index
  236.         jsr   64,x           8 bit offset index
  237.         jsr   4096,x         16 bit offset index
  238.         jsr   [,x]           0 bit offset indirect index
  239.         jsr   [1,x]          5 bit offset indirect index
  240.         jsr   [64,x]         8 bit offset indirect index
  241.         jsr   [4096,x]       16 bit offset indirect index
  242.         jsr   a,x            'A' register index
  243.         jsr   b,x            'B' register index
  244.         jsr   d,x            'D' ('A' & 'B') register index
  245.         jsr   [a,x]          'A' register indirect index
  246.         jsr   [b,x]          'B' register indirect index
  247.         jsr   [d,x]          'D' ('A' & 'B') register indirect index
  248.         jsr   ,x+            index with 1 post-increment
  249.         jsr   ,x++           index with 2 post-increment
  250.         jsr   ,-x            index with 1 pre-decrement
  251.         jsr   ,--x           index with 2 pre-decrement
  252.         jsr   [,x++]         indirect index with post-increment
  253.         jsr   [,--x]         indirect index with pre-drecement
  254.         jsr   1,pcr          8 bit index from 'PC'
  255.         jsr   64,pcr         8 bit index from 'PC'
  256.         jsr   <DLabel,pcr    forced 8 bit index from 'PC'
  257.         jsr   4096,pcr       16 bit index from 'PC'
  258.         jsr   >DLabel,pcr    forced 16 bit index from 'PC'
  259.         jsr   [1,pcr]        8 bit indirect index from 'PC'
  260.         jsr   [64,pcr]       8 bit indirect index from 'PC'
  261.         jsr   [4096,pcr]     16 bit indirect index from 'PC'
  262.         jsr   [Label1]       memory indirect
  263. EndLabel equ  $
  264.